home *** CD-ROM | disk | FTP | other *** search
/ Die Ultimative Software-P…i Collection 1996 & 1997 / Die Ultimative Software-Pakete CD-ROM fur Atari Collection 1996 & 1997.iso / p / pov / povlisti.ngs / waterbow.pov < prev    next >
Encoding:
Text File  |  1992-07-02  |  2.7 KB  |  130 lines
  1. // Persistence Of Vision raytracer version 1.0 sample file.
  2.  
  3. // By Various and Sundry
  4. //
  5. // Revision Note:
  6. // Reworked both the declared wood texture (turb and colormap) and
  7. // the application of it on the floor plane.
  8. // Note that wood doesn't really look like much until you get around
  9. // 640x480.  Anti-aliasing helps even more to bring out the detail.  -dmf
  10.  
  11. #include "shapes.inc"
  12. #include "colors.inc"
  13. #include "textures.inc"
  14.  
  15. // a light tan wood with brown rings
  16. #declare New_Tan_Wood = texture {
  17.    wood
  18.    turbulence 0.03
  19.    colour_map {
  20.       [0.0 0.4  colour red 0.6 green 0.45 blue 0.25
  21.       colour red 0.65 green 0.45 blue 0.25]
  22.       [0.4 1.01 colour red 0.6 green 0.4 blue 0.2
  23.       colour red 0.25 green 0.15 blue 0.05]
  24.    }
  25. }
  26.  
  27. camera {
  28.    direction <0.0 0.0  1.0>
  29.    up  <0.0  1.0  0.0>
  30.    right <1.333 0.0 0.0>
  31.    translate <0.0 0.0 -56.0>
  32. }
  33.  
  34.  
  35. // A bowl
  36. object {
  37.    intersection {
  38.       sphere { <0.0 0.0 0.0> 1.0 }
  39.       sphere { <0.0 0.0 0.0> 0.9 }
  40.       plane {  <0.0 1.0 0.0> 0.5 }
  41.    }
  42.    bounded_by {
  43.       sphere { <0.0 0.0 0.0> 21.0 }
  44.    }
  45.    scale < 20.0 20.0 20.0 >
  46.    texture {
  47.       colour Red
  48.       ambient 0.2
  49.       diffuse 0.8
  50.       reflection 0.1
  51.    }
  52.    colour Red
  53. }
  54.  
  55. // Water
  56. object {
  57.    intersection {
  58.       sphere { <0.0 0.0 0.0> 1.0 }
  59.       plane { <0.0 1.0 0.0> 0.49 }
  60.    }
  61.    bounded_by {
  62.       sphere { <0.0 0.0 0.0> 21.0 }
  63.    }
  64.    scale < 19.5 19.5 19.5 >
  65.    texture {
  66.       ripples 0.5
  67.       frequency 100.0
  68.       scale <100.0 100.0 100.0>
  69.       reflection 0.6
  70.       refraction 0.6
  71.       ior 1.2
  72.    }
  73.    colour Grey
  74. }
  75.  
  76.  
  77. // Wood floor
  78. object {
  79.    plane { <0.0 1.0 0.0> -20.0 }
  80.  
  81.    texture { 0.015            // seems to reduce "moire" effect on the grain
  82.  
  83.       New_Tan_Wood            // Think of a log, facing you...
  84.       scale <2 2 1>           // z is infinite, so 1 is ok...
  85.       rotate <0 90 0>         // turn the "log" to the x axis
  86.       rotate <0.0 0.0 10.0>   // tilt the log just a little bit
  87.       translate <0 -4  0>     // lift it to where the rings are larger
  88.       rotate <5 0 0>          // tip it again, this time on x axis
  89.  
  90.       ambient 0.15
  91.       diffuse 0.75
  92.       reflection 0.1
  93.    }
  94.    colour Tan
  95. }
  96.  
  97.  
  98. // Back wall
  99. object {
  100.    plane { <0.0 0.0 1.0> 100.0 }
  101.  
  102.    texture {
  103.       Red_Marble
  104.       scale <100.0 100.0 100.0>
  105.       ambient 0.15
  106.       diffuse 0.8
  107.       reflection 0.1
  108.    }
  109.    color Pink
  110. }
  111.  
  112. // A sky to reflect in the water
  113. object {
  114.    plane { <0.0 1.0 0.0> 150.0 }
  115.  
  116.    texture {
  117.       colour red 0.5 green 0.5 blue 1.0
  118.       ambient 0.15
  119.       diffuse 0.8
  120.    }
  121.    colour red 0.5 green 0.5 blue 1.0
  122. }
  123.  
  124. // Light source
  125. object {
  126.    light_source { <100.0  120.0  -130.0>
  127.       colour White
  128.    }
  129. }
  130.